home *** CD-ROM | disk | FTP | other *** search
/ The National Palace Museum Experience / The National Palace Museum Experience.iso / Programs / Opening.dxr / 00019.ls < prev    next >
Encoding:
Text File  |  1998-11-19  |  1.0 KB  |  34 lines
  1. on prepareMovie
  2.   global firstvideolength, secondvideolength
  3.   cursor(200)
  4.   set firstvideolength to the duration of member "left"
  5.   set secondvideolength to the duration of member "up"
  6.   preloadMember("Left", the number of member "Left" + 4)
  7.   preloadMember("Screen1", the number of member "Screen1" + 2)
  8.   set the volume of sound 1 to 120
  9. end
  10.  
  11. on startMovie
  12.   if soundBusy(1) then
  13.     sound stop 1
  14.   end if
  15.   playthesound(1, "..\Audio\Openning.wav")
  16.   delete field "From which Movie"
  17.   put "[#RoomNumber: 105, #NodeID: 9, #Flag: 0]" into field "Panorama Location"
  18.   put "[#GuideNumber: 1, #gCounter: 1, #Flag: 0]" into field "Guide Location"
  19.   put "[#FrameNumber: 1,#Slider: rect(0, 0, 0, 0), #Flag: 0]" into field "TimeLine Location"
  20.   put "[#FrameNumber: 1, #Text: rect(105, -1130, 357, 2140), #Flag: 0]" into field "Index Location"
  21. end
  22.  
  23. on stopMovie
  24.   sound close 1
  25.   sound close 2
  26. end
  27.  
  28. on gotomenu
  29.   set the stageColor to the stageColor
  30.   unloadMember("Left", the number of member "Left" + 4)
  31.   cursor(-1)
  32.   go("wait")
  33. end
  34.